Computer Life 1995 December/Computer Life December 1995.iso/nmmdemo/nmmdemo.exe/EVU3000.DXR/00166.ls

Text File | 1995-04-19 | 211 b | 9 lines

on exitFrame
  set thetime to the timer
  set newVal to 255 - float(float(thetime) / float(120) * float(255))
  set the volume of sprite 8 to max(newVal, 55)
  if newVal > 55 then
    go(the frame)
  end if
end